home *** CD-ROM | disk | FTP | other *** search
/ Floppyshop 2 / Floppyshop - 2.zip / Floppyshop - 2.iso / art&graf.ix / art-0039 / source / dcquickf.def < prev    next >
Text File  |  1997-04-16  |  517b  |  21 lines
  1. DEFINITION MODULE DCQuickFunctions;
  2.  
  3. (*    
  4.   Some useful routines coded in assembler for speed...
  5.  
  6.  
  7.  
  8. *)
  9. FROM    SYSTEM IMPORT LONGWORD,WORD, BYTE;
  10.  
  11. (* all numbers treated as unsigned            *)
  12. PROCEDURE LUDivRem( Dividend :LONGWORD; Divisor : WORD;
  13.                    VAR integer, remainder : WORD );
  14.  
  15. (* Bit 0 is the Most Sig. Bit in Byte 0 *)
  16. PROCEDURE SetBit( n : CARDINAL; VAR bits : ARRAY OF BYTE);
  17.  
  18. PROCEDURE TestBit( n : CARDINAL; VAR bits : ARRAY OF BYTE) : BOOLEAN;
  19.  
  20. END DCQuickFunctions.
  21.